(fortran-fill): Fill lines that do not have comments.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2d81a91486a50b48ea8274d00d585cace3aa2f5c..11a4acba970af9dc5c4cff2da15240fc4d72627c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-02-12  Glenn Morris  <gmorris@ast.cam.ac.uk>
+
+       * progmodes/fortran.el (fortran-fill): Fill lines that do not have
+       comments.
+
 2003-02-12  Juanma Barranquero  <lektu@terra.es>
 
        * files.el (file-truename): Revert change from 2002-11-27.

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index 4552f4a50a0bc36c4bd512c1a49c057f875dfe8e..e3a29289e896327967c0cc302d6306438336e5e7 100644 (file)
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1682,7 +1682,8 @@ If ALL is nil, only match comments that start in column > 0."
     ;; don't prevent a break.
     (when (and (save-excursion
                 (beginning-of-line)
-                (when (fortran-find-comment-start-skip)
+                (if (not (fortran-find-comment-start-skip))
+                     t
                   (goto-char (match-beginning 0))
                   (>= (point) fill-point)))
               (save-excursion